home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Power Disk 64 1998 4
/
Power_Disk_64_98-04_1998_Lagune_de_Side_B.d64
/
witze (4)
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2023-02-26
|
1KB
|
30 lines
1 print"[147]":poke53280,6:poke53281,3
2 print"[145] [215][201][212][218][197] - [212]eil 4 "
3 print"1. [201]n der [211]chule fragt der [204]ehrer:'[215]enn ich auf dem [203]opf stehe,dann laeuft"
4 print"mir das [194]lut in den [203]opf.[193]ber warum laeuft mir das [194]lut nicht in die"
5 print"[198]uesse,wenn ich auf ihnen stehe?'.[200]orst meldet sich:'[215]eil [201]hre [198]uesse nicht"
6 print"hohl sind,[200]err [204]ehrer."
7 print"2. [201]m [194]us sagt eine alte [198]rau zu einem [202]ungen:'[205]oechtest du nicht auf-"
8 print"stehen?'.[196]a antwortet der [202]unge:'[206]ee, das kenne ich![215]enn ich aufstehe,dann
9 [153]"setzen (NULL)ie sich auf meinen (NULL)latz!'"
10 [153]"3. (NULL)as heisst (NULL)onnenuntergang auf finnisch??? ((NULL)atn(NULL)(NULL)val str$(NULL)(NULL)vallen(NULL)val(NULL))"
11 [161]a$:[139]a$[178]""[167]11
12 [153]" left$val(NULL)(NULL)right$(NULL)(NULL)right$"
13 [161]a$:[139]a$[178]""[167]13
14 [153]"load4. str$ie (NULL)olizei haelt eine atnutofahrerin an:'(NULL)ie sind ueber 70,gnae' ascrau'"
15 [153]"atnntwortet diese:'atnch,tatsaechlich?(NULL)acht mich der neue left$ut wirklich so alt?'"
16 [153]"5. right$n (NULL)val(NULL)valchr$atnstr$val mit (NULL)val(NULL)val(NULL)lenval left$right$(NULL)(NULL) kam eineaehnliche (NULL)zene:'(NULL)ein left$err,(NULL)ie"
17 [153]"sind ueber 70.'left$right$(NULL)(NULL):'(NULL)a und?str$afuer sehe ich doch noch recht gut aus!'"
18 [153]"6."
19 [153]"7. (NULL)lenleft$val(NULL)(NULL)asc(NULL)atnchr$val:(NULL)elcher peekus fuhr als erster ueber das (NULL)eer nach atnmerika?
20 print"[212]aste"
21 geta$:ifa$=""then21
22 print" [196]er [195][207][204][213][205][194][213][211] !"
23 geta$:ifa$=""then23
24 poke828,0
25 print chr$(147) chr$(17)
26 print "load"chr$(34);"witze (5)";chr$(34);",8
27 [153] [199](17) [199](17) [199](17) [199](17) "run"
28 [151] 631,13:[151]632,13:[151]198,2
29 [153] [199](19);:[128]